home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2002 November / SGI IRIX Base Documentation 2002 November.iso / usr / share / catman / p_man / cat3 / f90 / compl.z / compl
Encoding:
Text File  |  2002-10-03  |  3.5 KB  |  103 lines
  1. COMPL(3I)                                             Last changed: 4-13-99
  2.  
  3.  
  4. NNAAMMEE
  5.      CCOOMMPPLL - Computes complement
  6.  
  7. SSYYNNOOPPSSIISS
  8.      CCOOMMPPLL (([II==]_i))
  9.  
  10. IIMMPPLLEEMMEENNTTAATTIIOONN
  11.      UNICOS, UNICOS/mk, IRIX systems
  12.  
  13.      CF90, MIPSpro 7 Fortran 90
  14.  
  15. SSTTAANNDDAARRDDSS
  16.      Fortran extension
  17.  
  18. DDEESSCCRRIIPPTTIIOONN
  19.      The CCOOMMPPLL intrinsic function computes the complement of _i.  It accepts
  20.      the following argument:
  21.  
  22.      _i         A Boolean, integer, real, logical, or Cray pointer value.
  23.  
  24.      CCOOMMPPLL is an elemental function.  The name of this intrinsic cannot be
  25.      passed as an argument.
  26.  
  27.      The following tables show both the logical complement and the bit-wise
  28.      logical complement:
  29.  
  30.      ------------------------------------
  31.      Logical        CCOOMMPPLL
  32.      Variable       (Logical Variable)
  33.      ------------------------------------
  34.            T                  F
  35.            F                  T
  36.      ------------------------------------
  37.  
  38.  
  39.      -----------------------------------
  40.      Bit of        CCOOMMPPLL
  41.      Variable      (Bit of Variable)
  42.      -----------------------------------
  43.           1                  0
  44.           0                  1
  45.      -----------------------------------
  46.  
  47. NNOOTTEESS
  48.      CCOOMMPPLL is outmoded.  Refer to the _F_o_r_t_r_a_n _L_a_n_g_u_a_g_e _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l,
  49.      _V_o_l_u_m_e _2, for information about outmoded features and their preferred
  50.      standard alternatives.
  51.  
  52. CCAAUUTTIIOONNSS
  53.      Unexpected results can occur when Boolean functions are declared
  54.      external and then used with logical arguments.  On UNICOS and
  55.      UNICOS/mk systems, the external Boolean functions always treat their
  56.      arguments as type Boolean and return a Boolean result.  On IRIX
  57.      systems, the result is an integer.
  58.  
  59. RREETTUURRNN VVAALLUUEESS
  60.      When given an argument of type logical, CCOOMMPPLL computes a logical
  61.      complement and returns a logical result.
  62.  
  63.      On UNICOS and UNICOS/mk systems, with an argument of type integer,
  64.      real, Boolean, or Cray pointer, CCOOMMPPLL computes a bit-wise logical
  65.      complement and returns a Boolean result.  No type conversion occurs.
  66.  
  67.      On IRIX systems, with an argument of type integer, real, Boolean, or
  68.      Cray Pointer, CCOOMMPPLL computes a bit-wise logical complement and returns
  69.      an integer result.
  70.  
  71. EEXXAAMMPPLLEESS
  72.      The following section of Fortran code shows the CCOOMMPPLL function used
  73.      with an argument of type logical:
  74.  
  75.           LOGICAL L1, L2
  76.           ...
  77.           L2 = COMPL(L1)
  78.  
  79.      The following section of Fortran code shows the CCOOMMPPLL function used
  80.      with an argument of type integer.  The bit patterns of the argument
  81.      and result are also given.  For clarity, only the rightmost 8 bits are
  82.      shown.
  83.  
  84.           INTEGER I1, I2
  85.           I1 = 240
  86.           ...
  87.           I2 = COMPL(I1)
  88.  
  89.  
  90.                  -------------------------------
  91.                 | 1 | 1 | 1 | 1 | 0 | 0 | 0 | 0 |
  92.                  -------------------------------
  93.                              I1
  94.  
  95.                  -------------------------------
  96.                 | 0 | 0 | 0 | 0 | 1 | 1 | 1 | 1 |
  97.                  -------------------------------
  98.                              I2
  99.  
  100. SSEEEE AALLSSOO
  101.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l for the printed version of this
  102.      man page.
  103.